home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 42 / Amiga Format AFCD42 (Issue 126, Aug 1999).iso / start_here! < prev    next >
Text File  |  1999-04-24  |  754b  |  26 lines
  1. Set AFCDVIEW AFCDView
  2. FailAt 21
  3. Stack 20000
  4.  
  5. ;check whether user has installed AFCDView
  6. If NOT EXISTS C:AFCDView
  7.     RequestChoice >ENV:INSTALL "Request" "AFCDView does not appear to be installed on your system. Do you wish to install it?"    "Yes|No"
  8.     If $INSTALL EQ 1
  9.         Copy >NIL: :C/AFCDView TO C: CLONE
  10.         If $RC EQ 20
  11.             RequestChoice >NIL: "Information" "Sorry. Installation failed. Running AFCDView from the CD." "Continue"
  12.             Set AFCDVIEW :c/AFCDView
  13.         EndIf
  14.     Else
  15.         Set AFCDVIEW :c/AFCDView
  16.     EndIf
  17. EndIf
  18.  
  19. ;go for it!
  20. If EXISTS ENV:SeenIt
  21.     Run >NIL: <NIL: $AFCDVIEW :-Websites-/-Amiga_Format-/frames.ben.html
  22. Else
  23.     Run >NIL: <NIL: $AFCDVIEW :-Websites-/start.html
  24.     SetENV SeenIt 1
  25. EndIf
  26.